home *** CD-ROM | disk | FTP | other *** search
/ Aminet 39 / Aminet 39 (2000)(Schatztruhe)[!][Oct 2000].iso / Aminet / comm / misc / CManager.lha / CManager / Rexx / SendIB.rexx < prev    next >
Encoding:
OS/2 REXX Batch file  |  1998-09-25  |  413 b   |  25 lines
  1. /*
  2.  *      $VER: SendIB.rexx 1.0 (5.8.98)
  3.  */
  4.  
  5. parse arg '"'args'" "'BROWSER'"'
  6. options results
  7.  
  8. if show('P','IBROWSE') then do
  9.           address 'IBROWSE'
  10.           SHOW
  11.           GOTOURL args
  12.           Exit
  13. end
  14.  
  15. ADDRESS COMMAND 'Run ' BROWSER
  16. ADDRESS COMMAND "SYS:RexxC/WaitForPort" 'IBROWSE'
  17.  
  18. if show('P','IBROWSE') then do
  19.           address 'IBROWSE'
  20.           SHOW
  21.           GOTOURL args
  22.           Exit
  23. end
  24.  
  25.